home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CICA 1993 April
/
CICA MS Windows - April 1993.iso
/
unzipped
/
programr
/
vbasic
/
winfo
/
winfo.frm
(
.txt
)
< prev
next >
Wrap
Visual Basic Form
|
1991-11-09
|
5KB
|
180 lines
Winfo
Winfo
wwpwww
wwwww
wpwpww
wwwwww
wwwwwwwx
wwwwww
wwwwwwwx
wwwwww
wwwwwwx
wwwwww|
wwwwwwx
wwwwwww
wwwwwx
wwwwwww|
wwwwwx
wwwwwx
wwwwwx
wwwwwx
wwww|
wwwwwx
wwwww
wwwwwwx
wwwwwwwwwwwwwwx
wwwwwwwwwwwwwwx
wwwwwwwwwx
wwwwwwwx
wwwwwwwwwx
wwwwwwwwwx
wwwwpwwwwwwwwwx
Form1
Label1
Some Information About Windows..
Tms Rmn
Label8
Label9
Label11
And the time is:
Label10
Label12
Label2
Label3
Label4
Label5
Label6
Label7
&Done
About
&About
Timer1
Form_Click
GetWinFlags
WF_CPU386
text1
WinFlags
@ Form_Loada
WF_ENHANCEDG
WF_LARGEFRAME
text2
text3
GetCurrentTime#
GetTime
text4
chip:
WF_CPU286
WF_CPU
WF_CPU486B
Text4_Change{
label1
WF_STANDARD
label29
label3y
captionU
label4
Command1_Click
Remove_Items_From_Sysmenu
A_Form_
HSysMenu\
GetSystemMenu-
RemoveMenu
MF_BYPOSITION
Command2_Click
AboutBox
ScreenL
width
witdh
height
modalo
modEnd
hRemove_Items_From_Sysmenu
enabled,
WF_80x87
label5J
label6N
GetFreeSpace
label7
Fornat
GetVersion
GetNumTasks
Tasks%
TWinFlags
WF_PMODE[
WF_WIN286h
WF_WIN386u
WF_CPU086
WF_CPU186
WF_SMALLFRAME
WF_086
WF_186
Winfo-
command1
About_Click
Done_Click
enabeled
Form_GotFocus
GetDate7
Today
label98
Taday!
label10g
Form_LinkClose
Form_LinkErrorA
LinkErr
Form_LinkExecute
CmdStr
Cancel
Form_LinkOpen
Form_LostFocus
Ptime
Timer1_Timer
Label1_Click
Label11_Click
CConst
bRevert
Deflnt
hMenu
nPosition
wFlags
User!
Kernel
In Proteceted mode?
Is it a 286?
Is it a 386?
Is it a 486?
Standard mode?
Enhanced mode?
Is it a 8086
LargeFrame EMS
SmallFrame EMS
Math processer
Form_Load
Center formc
You are in Enhanced mode."
You are in Standard mode."
Your CPU is a 386.
Your CPU is a 286.
Your CPU is a 486.
Your CPU is a 8086."
Lagre Frame EMS is active."
Small Frame EMS is active.
Math Co-processor present."
Math Co-processor not present.
Protected Mode - Enabled."
Protected Mode - Disabled.
KB of free Memory."
About_Click
Show AboutBoxF
Disable the Winfo form
Done_Click
I think you know what this means!
Form_GotFocus
When focus goes back to Winfo form, make Done the active buttonu
GetDate
Get date string and covert it to a standard format.a
Today is "
dddd, mmmm dd, yyyy"
Timer1_Timer
Put the current Time on form and keep it going.m